Chip 2007 January, February, March & April/Chip-Cover-CD-2007-02.iso/Pakiet internetowy/Czytniki NEWS/40Tude Dialog 2.0.15.1 beta 38/4d2b38.exe/{app}/dialog.exe/0/RCDATA/TFRMTB2000CUSTOMIZE/TFRMTB2000CUSTOMIZE.txt

Text File | 2005-02-07 | 8.2 KB | 349 lines

object frmTB2000Customize: TfrmTB2000Customize
  Left = 624
  Top = 161
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = 'Customize Toolbars'
  ClientHeight = 359
  ClientWidth = 488
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  KeyPreview = True
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnKeyDown = FormKeyDown
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label11: TTntLabel
    Left = 88
    Top = 336
    Width = 220
    Height = 13
    Caption = '*: To remove a shortcut press the Ctrl key only.'
  end
  object pcMain: TTntPageControl
    Left = 0
    Top = 0
    Width = 488
    Height = 321
    ActivePage = tshCommands
    Align = alTop
    TabOrder = 0
    object tshCommands: TTntTabSheet
      Caption = 'Commands'
      ImageIndex = 1
      object Label1: TTntLabel
        Left = 8
        Top = 70
        Width = 50
        Height = 13
        Caption = 'Categories'
        FocusControl = lbCategories
      end
      object Label2: TTntLabel
        Left = 142
        Top = 70
        Width = 52
        Height = 13
        Caption = 'Commands'
        FocusControl = lbCommands
      end
      object Label3: TTntLabel
        Left = 8
        Top = 4
        Width = 413
        Height = 25
        AutoSize = False
        Caption = 'To add commands, drag and drop them onto a toolbar.'
        Transparent = True
        WordWrap = True
      end
      object Label4: TTntLabel
        Left = 8
        Top = 31
        Width = 417
        Height = 30
        AutoSize = False
        Caption =
          'To remove commands, drop the "Del" button on the right onto the ' +
          'toolbar.'
        Transparent = True
        WordWrap = True
      end
      object Bevel1: TBevel
        Left = 8
        Top = 62
        Width = 468
        Height = 7
        Shape = bsTopLine
      end
      object Label5: TTntLabel
        Left = 144
        Top = 248
        Width = 50
        Height = 13
        Caption = 'Shortcut *:'
      end
      object Label6: TTntLabel
        Left = 144
        Top = 276
        Width = 73
        Height = 13
        Caption = 'Mouse gesture:'
        FocusControl = MouseGestureCB
      end
      object DelDragDrop: TTBXButton
        Left = 427
        Top = 4
        Width = 50
        Height = 53
        AutoSize = False
        Caption = 'Del'
        DragMode = dmAutomatic
        ImageIndex = 0
        TabOrder = 4
        OnDragDrop = DelDragDropDragDrop
        OnDragOver = DelDragDropDragOver
      end
      object lbCategories: TTntListBox
        Left = 8
        Top = 88
        Width = 121
        Height = 201
        ItemHeight = 13
        TabOrder = 0
        OnClick = lbCategoriesClick
      end
      object lbCommands: TTntListBox
        Left = 142
        Top = 88
        Width = 335
        Height = 149
        Style = lbOwnerDrawFixed
        DragMode = dmAutomatic
        ItemHeight = 16
        TabOrder = 1
        OnClick = lbCommandsClick
        OnDragDrop = lbCommandsDragDrop
        OnDragOver = lbCommandsDragOver
        OnDrawItem = lbCommandsDrawItem
      end
      object MouseGestureCB: TTntComboBox
        Left = 224
        Top = 268
        Width = 253
        Height = 21
        AutoComplete = False
        Style = csDropDownList
        ItemHeight = 13
        TabOrder = 3
        OnChange = MouseGestureCBChange
        Items.WideStrings = (
          'None'
          'Down'
          'Up'
          'Left'
          'Right'
          'Down, then Up'
          'Up, then Down'
          'Left, then Right'
          'Right, then Left'
          'Circle'
          'Top Right to Bottom Left'
          'Bottom Right to Top Left'
          'Bottom Left to Top Right'
          'Top Left to Bottom Right')
      end
      object Shortcut: TEdit
        Left = 224
        Top = 244
        Width = 253
        Height = 21
        Color = clBtnFace
        ReadOnly = True
        TabOrder = 2
        OnExit = ShortcutExit
      end
    end
    object tshOptions: TTntTabSheet
      Caption = 'Options'
      ImageIndex = 2
      TabVisible = False
      object cbTooltips: TtntAutoSizeCheckBox
        Left = 8
        Top = 8
        Width = 83
        Height = 17
        Caption = '&Show tooltips'
        TabOrder = 0
      end
    end
    object TabSheet1: TTntTabSheet
      Caption = 'Mouse gestures'
      ImageIndex = 4
      object Label7: TTntLabel
        Left = 8
        Top = 8
        Width = 469
        Height = 33
        AutoSize = False
        Caption =
          'Mouse gestures work by holding down the right mouse button, doin' +
          'g the gesture and releasing the right mouse button again.'
        WordWrap = True
      end
      object Label8: TTntLabel
        Left = 4
        Top = 72
        Width = 68
        Height = 13
        Caption = '&Positive Delta:'
      end
      object Label9: TTntLabel
        Left = 4
        Top = 96
        Width = 74
        Height = 13
        Caption = '&Negative Delta:'
      end
      object StrokePaintBox: TPaintBox
        Left = 240
        Top = 96
        Width = 170
        Height = 170
        OnPaint = StrokePaintBoxPaint
      end
      object Indicator: TShape
        Left = 420
        Top = 96
        Width = 21
        Height = 21
        Brush.Color = clRed
        Shape = stCircle
      end
      object Bevel2: TBevel
        Left = 4
        Top = 132
        Width = 200
        Height = 2
        Shape = bsFrame
      end
      object Label10: TTntLabel
        Left = 8
        Top = 152
        Width = 189
        Height = 93
        Alignment = taCenter
        AutoSize = False
        Caption =
          'You can test and train mouse gestures here. If a mouse gesture i' +
          's recognized, the indicator will turn green and the recognized g' +
          'esture is shown to the right.'
        WordWrap = True
      end
      object MouseGestEnabled: TtntAutoSizeCheckBox
        Left = 4
        Top = 44
        Width = 130
        Height = 17
        Caption = '&Enable mouse gestures'
        TabOrder = 0
        OnClick = MouseGestEnabledClick
      end
      object MouseGestDirectionCoB: TTntComboBox
        Left = 240
        Top = 68
        Width = 173
        Height = 21
        AutoComplete = False
        Style = csDropDownList
        ItemHeight = 13
        TabOrder = 3
        OnChange = MGPosDeltaChange
        Items.WideStrings = (
          'Down'
          'Up'
          'Left'
          'Right'
          'Down, then Up'
          'Up, then Down'
          'Left, then Right'
          'Right, then Left'
          'Circle'
          'Top Right to Bottom Left'
          'Bottom Right to Top Left'
          'Bottom Left to Top Right'
          'Top Left to Bottom Right')
      end
      object MGPosDelta: tMMjvspinedit
        Left = 132
        Top = 68
        Width = 57
        Height = 21
        MaxValue = 200.000000000000000000
        MinValue = 1.000000000000000000
        Value = 10.000000000000000000
        TabOrder = 1
        OnChange = MGPosDeltaChange
      end
      object MGNegDelta: tMMjvspinedit
        Left = 132
        Top = 92
        Width = 57
        Height = 21
        MaxValue = 200.000000000000000000
        MinValue = 1.000000000000000000
        Value = 10.000000000000000000
        TabOrder = 2
        OnChange = MGPosDeltaChange
      end
    end
  end
  object btnOK: TMMTNTBItBtn
    Left = 408
    Top = 334
    Width = 80
    Height = 25
    Caption = 'Close'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBtnText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ModalResult = 1
    ParentFont = False
    TabOrder = 1
    OnClick = btnOKClick
  end
  object HelpBtn: TMMTNTBItBtn
    Left = 8
    Top = 334
    Width = 75
    Height = 25
    Caption = 'Help'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBtnText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    OnClick = HelpBtnClick
  end
  object Timer1: TTimer
    Enabled = False
    OnTimer = Timer1Timer
    Left = 184
    Top = 312
  end
end